package com.yunxi.core.util;

import com.google.zxing.*;
import com.google.zxing.client.j2se.BufferedImageLuminanceSource;
import com.google.zxing.common.BitMatrix;
import com.google.zxing.common.HybridBinarizer;
import com.google.zxing.qrcode.decoder.ErrorCorrectionLevel;
import org.apache.commons.lang3.StringUtils;
import org.apache.commons.logging.Log;
import org.apache.commons.logging.LogFactory;
import sun.misc.BASE64Encoder;
import javax.imageio.ImageIO;
import java.awt.*;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;
import java.io.*;
import java.util.Hashtable;
import java.util.Random;

/**
 * 二维码生成
 * @author Administrator
 *
 */
public class QrCodeUtils
{
    private static final Log logger = LogFactory.getLog(QrCodeUtils.class);

	private static final String CHARSET = "utf-8";
	private static final String FORMAT = "JPG";
    // 二维码尺寸
	private static final int QRCODE_SIZE = 150;
	private static final int QRCODE_SIZE_BIGGER = 400;
	// LOGO宽度
	private static final int LOGO_WIDTH = 60;
	// LOGO高度
	private static final int LOGO_HEIGHT = 60;

	/**
	 * 生成入库标签
	 * @param vin
	 * @param storageName
	 * @param stockInDate
	 * @return
	 * @throws Exception
	 */
	public static InputStream newStockInImg(String vin,String storageName,String stockInDate) throws Exception {
		//1.生成外部图片
		BufferedImage image = new BufferedImage(400,200,BufferedImage.TYPE_3BYTE_BGR);
		//2.二维码图片
		BufferedImage image1 = createImage(vin, null, false,QRCODE_SIZE);
		Graphics2D graph = image.createGraphics();
		graph.setRenderingHint(RenderingHints.KEY_TEXT_ANTIALIASING, RenderingHints.VALUE_TEXT_ANTIALIAS_ON);
		int width = image1.getWidth();
		int height = image1.getHeight();
		int x = (QRCODE_SIZE_BIGGER - width) / 2;
		int y = (200 - height) / 2;
		graph.setColor(Color.white);
		graph.fillRect(0,0,400,200);//设置白色背景
		graph.drawImage(image1,null,10,y);//插入二维码
		Font font = new Font("微软雅黑", Font.PLAIN, 10);
		graph.setFont(font);
		graph.setColor(Color.BLACK);//设置画笔颜色
		if(StringUtils.isNotEmpty(storageName)){
			graph.drawString(storageName,210,50);//插入字符1
		}
		graph.drawString(vin,210,100);//插入字符2
		graph.drawString(stockInDate,210,150);//插入字符3
//		Shape shape = new RoundRectangle2D.Float(20, y, width, width, 6, 6);
		graph.setStroke(new BasicStroke(3f));
//		graph.draw(shape);
		graph.dispose();
		//保存图片到本地
//		ImageIO.write(image, "png", new File("F:\\test" + "/" + "测试图片.png"));
		ByteArrayOutputStream out = new ByteArrayOutputStream();
		//转换成png格式的IO流
		ImageIO.write(image, "png", out);
		InputStream is = new ByteArrayInputStream(out.toByteArray());
		return is;
	}

	/**
	 * 创建二维码
	 * @param contents
	 * @param width
	 * @param height
	 * @return
	 */
	public static String creatRrCode(String contents, int width, int height) {
		String binary = null;
		Hashtable hints = new Hashtable();
		hints.put(EncodeHintType.CHARACTER_SET, "utf-8");
		try {
			BitMatrix bitMatrix = new MultiFormatWriter().encode(
					contents, BarcodeFormat.QR_CODE, width, height, hints);
			// 1、读取文件转换为字节数组
			ByteArrayOutputStream out = new ByteArrayOutputStream();
			BufferedImage image = toBufferedImage(bitMatrix);
			//转换成png格式的IO流
			ImageIO.write(image, "png", out);
			byte[] bytes = out.toByteArray();

			// 2、将字节数组转为二进制
			BASE64Encoder encoder = new BASE64Encoder();
			binary = encoder.encodeBuffer(bytes).trim();
		} catch (WriterException e) {
			e.printStackTrace();
		} catch (IOException e) {
			e.printStackTrace();
		}
		return binary;
	}

	/**
	 * image流数据处理
	 * @param matrix
	 * @return
	 */
	public static BufferedImage toBufferedImage(BitMatrix matrix) {
		int width = matrix.getWidth();
		int height = matrix.getHeight();
		BufferedImage image = new BufferedImage(width, height, BufferedImage.TYPE_INT_RGB);
		for (int x = 0; x < width; x++) {
			for (int y = 0; y < height; y++) {
				image.setRGB(x, y, matrix.get(x, y) ? 0xFF000000 : 0xFFFFFFFF);
			}
		}
		return image;
	}

	/**
	 * 创建图片
	 * @param content
	 * @param logoPath 内嵌logo地址
	 * @param needCompress 是否压缩
	 * @return
	 * @throws Exception
	 */
	private static BufferedImage createImage(String content, String logoPath, boolean needCompress,int qrcodeSize) throws Exception {
		Hashtable<EncodeHintType, Object> hints = new Hashtable<EncodeHintType, Object>();
		hints.put(EncodeHintType.ERROR_CORRECTION, ErrorCorrectionLevel.H);
		hints.put(EncodeHintType.CHARACTER_SET, CHARSET);
		hints.put(EncodeHintType.MARGIN, 1);
		BitMatrix bitMatrix = new MultiFormatWriter().encode(content, BarcodeFormat.QR_CODE, qrcodeSize, qrcodeSize,
				hints);
		int width = bitMatrix.getWidth();
		int height = bitMatrix.getHeight();
		BufferedImage image = new BufferedImage(width, height, BufferedImage.TYPE_INT_RGB);
		for (int x = 0; x < width; x++) {
			for (int y = 0; y < height; y++) {
				image.setRGB(x, y, bitMatrix.get(x, y) ? 0xFF000000 : 0xFFFFFFFF);
			}
		}
		if (logoPath == null || "".equals(logoPath)) {
			return image;
		}
		// 插入图片
		insertImage(image, logoPath, needCompress);
		return image;
	}

	/**
	 * 插入logo
	 * @param source 二维码图片
	 * @param logoPath logo地址
	 * @param needCompress 是否压缩
	 * @throws Exception
	 */
	private static void insertImage(BufferedImage source, String logoPath, boolean needCompress) throws Exception {
		File file = new File(logoPath);
		if (!file.exists()) {
			throw new Exception("logo file not found.");
		}
		Image src = ImageIO.read(new File(logoPath));
		int width = src.getWidth(null);
		int height = src.getHeight(null);
		if (needCompress) { // 压缩LOGO
			if (width > LOGO_WIDTH) {
				width = LOGO_WIDTH;
			}
			if (height > LOGO_HEIGHT) {
				height = LOGO_HEIGHT;
			}
			Image image = src.getScaledInstance(width, height, Image.SCALE_SMOOTH);
			BufferedImage tag = new BufferedImage(width, height, BufferedImage.TYPE_INT_RGB);
			Graphics g = tag.getGraphics();
			g.drawImage(image, 0, 0, null); // 绘制缩小后的图
			g.dispose();
			src = image;
		}
		// 插入LOGO
		Graphics2D graph = source.createGraphics();
		int x = (QRCODE_SIZE - width) / 2;
		int y = (QRCODE_SIZE - height) / 2;
		graph.drawImage(src, x, y, width, height, null);
		Shape shape = new RoundRectangle2D.Float(x, y, width, width, 6, 6);
		graph.setStroke(new BasicStroke(3f));
		graph.draw(shape);
		graph.dispose();
	}

	/**
	 * 生成二维码(内嵌logo)
	 * 文件名随机,可能重复
	 * @param content
	 * @param logoPath
	 * @param destPath
	 * @param needCompress
	 * @return
	 * @throws Exception
	 */
	public static String encode(String content, String logoPath, String destPath, boolean needCompress) throws Exception {
		BufferedImage image = createImage(content, logoPath, needCompress,QRCODE_SIZE);
		mkdirs(destPath);
		String fileName = new Random().nextInt(99999999) + "." + FORMAT.toLowerCase();
		ImageIO.write(image, FORMAT, new File(destPath + "/" + fileName));
		return fileName;
	}

	/**
	 * 当文件夹不存在时，mkdirs会自动创建多层目录，区别于mkdir．
	 * (mkdir如果父目录不存在则会抛出异常)
	 * @param destPath
	 */
	public static void mkdirs(String destPath) {
		File file = new File(destPath);
		if (!file.exists() && !file.isDirectory()) {
			file.mkdirs();
		}
	}

	/**
	 * 生成二维码(内嵌LOGO)
	 * 调用者指定二维码文件名
	 * @param content
	 * @param logoPath
	 * @param destPath
	 * @param fileName
	 * @param needCompress
	 * @return
	 * @throws Exception
	 */
	public static String encode(String content, String logoPath, String destPath, String fileName, boolean needCompress) throws Exception {
		BufferedImage image = createImage(content, logoPath, needCompress,QRCODE_SIZE);
		mkdirs(destPath);
		fileName = fileName.substring(0, fileName.indexOf(".")>0?fileName.indexOf("."):fileName.length())
				+ "." + FORMAT.toLowerCase();
		ImageIO.write(image, FORMAT, new File(destPath + "/" + fileName));
		return fileName;
	}

	public static String encode(String content, String logoPath, String destPath) throws Exception {
		return encode(content, logoPath, destPath, false);
	}

	public static String encode(String content, String destPath, boolean needCompress) throws Exception {
		return encode(content, null, destPath, needCompress);
	}

	public static void encode(String content, String logoPath, OutputStream output, boolean needCompress)
			throws Exception {
		BufferedImage image = createImage(content, logoPath, needCompress,QRCODE_SIZE);
		ImageIO.write(image, FORMAT, output);
	}

	public static void encode(String content, OutputStream output) throws Exception {
		encode(content, null, output, false);
	}

	public static String decode(File file) throws Exception {
		BufferedImage image;
		image = ImageIO.read(file);
		if (image == null) {
			return null;
		}
		BufferedImageLuminanceSource source = new BufferedImageLuminanceSource(image);
		BinaryBitmap bitmap = new BinaryBitmap(new HybridBinarizer(source));
		Result result;
		Hashtable<DecodeHintType, Object> hints = new Hashtable<DecodeHintType, Object>();
		hints.put(DecodeHintType.CHARACTER_SET, CHARSET);
		result = new MultiFormatReader().decode(bitmap, hints);
		String resultStr = result.getText();
		return resultStr;
	}

	public static String decode(String path) throws Exception {
		return decode(new File(path));
	}

	public static void main(String[] args) throws Exception {
//		String text = "666";
		newStockInImg("123","456","2019-08-28");
		//不含Logo
//		encode(text, null, "F:\\test", false);
		//含Logo，不指定二维码图片名
		//QrCodeUtils2.encode(text, "/Users/ianly/Documents/picture/google-icon.jpg", "/Users/ianly/Documents/picture/", true);
		//含Logo，指定二维码图片名
//		encode(text, "/Users/ianly/Documents/picture/google-icon.jpg", "/Users/ianly/Documents/picture", "qrcode", true);
	}



	/*
	 * bean2map
	 */
	/*public static Map bean2map(Object bean)
	{
		Map map = null;
		try
		{
			map = PropertyUtils.describe(trim(bean));
		} catch (IllegalAccessException e)
		{
			e.printStackTrace();
		} catch (InvocationTargetException e)
		{
			e.printStackTrace();
		} catch (NoSuchMethodException e)
		{
			e.printStackTrace();
		}
		return map;
	}*/


}
